Top 10k strings from Backgammon (19xx)(CDS Microsystems)[a2].z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /

Back to the directory listing

   2 S(DC)=S(DC+1
   2 S(DC)=-9999
   2 D(Z(DF))=-D(Z(DF))
   2 A$="Your move:
   1 i `EGGBBAABBAAFFEEEEAAFFAABBAAGGE  EGGBBAABBAAFFEEEEAAFFAABBAAGGE  EAABBAABBAAFFEEEEAAFFAABBAAGGE  EAABBAABBAAFFEEEEAABBAABBAAGGE  EAABBAABBAAFFEEEEAABBAABBAAGGE  EAABBAABBAABBEEEEAABBAABBAABBE  EAABBAABBAABBEEEEAABBAABBAABBE  
   1 a$="PLAYER moves first":
   1 a$="COMPUTER moves first"
   1 Z(DF)=Z(DF)+1
   1 Y(DF)=B(26
   1 X(DF)=B(T(DF)):
   1 T(DF)=F(DF)-D(Z(DF)):
   1 Select level 1-4
   1 R(DF)=B(F(DF)):
   1 GAMMON    
   1 F(DF)=F(DF)+1
   1 E  EBBAABBAABBAAEEEEBBAABBAABBAAE  EBBAABBAABBAAEEEEBBAABBAABBAAE  EBBAABBAABBGGEEEEBBAABBAABBFFE  EBBAABBAABBGGEEEEBBAABBAABBFFE  EBBAABBAABBGGEEEEBBGGBBAABBFFE  EFFAABBAABBGGEEEEBBGGBBAABBFFE  EFFAABBAABBGGEEEEBBGGBBAABBFFE  
   1 DX=-D(Z(DF)):
   1 D(Z(DF))<0
   1 D(BD)=-D(BD)
   1 B(X+DX)>-2
   1 B(T)=B(T)-1
   1 B(T(DF))=X(DF):
   1 B(T(DF))=B(T(DF))+1
   1 B(T(DF))=0
   1 B(T(DF))<-1
   1 B(F)=B(F)+1
   1 B(F(DF))=R(DF)
   1 B(F(DF))=B(F(DF))-1
   1 B(F(DF))<1
   1 B(BT)=B(BT)+1
   1 B(B)=B(B)-1
   1 AD=AD+O*(I-31
   1 AD=AD+O*(26
   1 A$="You wish to change level Y/N":
   1 A$="You can't move !":
   1 A$="Thinking....":
   1 A$="Select level 1-4":
   1 A$="Rolling....":
   1 A$="Rolling for first move":
   1 A$="My move:
   1 A$="I can't move !":
   1 A$="Another game Y/N":
   1 A$="** ILLEGAL MOVE **":
   1 ;"YOU WIN !"
   1 ;"YOU -    ME -"
   1 ;"Standard stake"
   1 ;"POINTS SCORE"
   1 ;"Gammon stake"
   1 ;"Backgammon stake"
   1 ;" I WIN !"
   1 -I-I)*(I>13
   1 -I)=-B(I):
   1 *(LC+LH-26
   1 * BACKGAMMON *
   1 );" ";D(BD);
   1 ))-B(LC)-B(LH)+BL*6